home *** CD-ROM | disk | FTP | other *** search
/ Laboratorio Interattivo Deagostini / laboratorio interattivo deagostini.bin / Start1.dir / 00002_Script_2 < prev   
Text File  |  2003-01-08  |  2KB  |  64 lines
  1. global gPercorsoMovies, gSigla, gPercorsoVideo, gPercorsoSfondi
  2. property pSpriteVideo
  3.  
  4. --on exitFrame
  5. --  if gSigla = 1 then
  6. --    --Definisco gli sprite da usare
  7. --    spriteSfondo = 1
  8. --    pSpriteVideo = 2
  9. --    --Creo lo sfondo
  10. --    MSfondo = new(#bitmap)
  11. --    MSfondo.fileName = gPercorsoSfondi & "filmato.jpg"
  12. --    --Lo posiziono sulla stage
  13. --    puppetSprite spriteSfondo, TRUE
  14. --    sprite(spriteSfondo).member = MSfondo
  15. --    sprite(spriteSfondo).loc = point(400,300)
  16. --    --    sprite(spriteSfondo).rect = rect(0,0,(the stageRight-the stageLeft),(the stageBottom-the stageTop))
  17. --    --Creo un member per il video, diverso se sono su Mac o su PC
  18. --    if the platform starts "MAC" then
  19. --      MVideo = new(#QuickTimeMedia)
  20. --    else
  21. --      MVideo = new(#digitalVideo)
  22. --    end if
  23. --    --Carico il castmember e ne setto alcune proprietα
  24. --    MVideo.fileName = gPercorsoVideo & "Sigla.avi"
  25. --    MVideo.directToStage = 1
  26. --    MVideo.video = 1
  27. --    MVideo.sound = 0
  28. --    MVideo.pausedAtStart = 0
  29. --    
  30. --    --Lo posiziono sulla stage
  31. --    puppetSprite pSpriteVideo, TRUE
  32. --    sprite(pSpriteVideo).member = MVideo
  33. --    sprite(pSpriteVideo).loc = point(400,300)
  34. --    gSigla = 0
  35. --  end if
  36. --  
  37. --  --Controllo se la sigla Φ finita, sempre se l'ho giα posizionata
  38. --  if NOT voidP(pSpriteVideo) then
  39. --    if sprite(pSpriteVideo).movieTime = sprite(pSpriteVideo).member.duration then
  40. --      go to movie gPercorsoMovies & "Main"
  41. --    else
  42. --      go the frame
  43. --    end if
  44. --  else
  45. --    go the frame
  46. --  end if
  47. --end
  48.  
  49. --Al click skippa la sigla
  50. --on mouseUp me
  51. --  go to movie gPercorsoMovies & "sigla"
  52. --end
  53.  
  54.  
  55.  
  56. --Al click skippa la sigla
  57. on exitFrame me
  58.   go to movie "sigla"
  59. end
  60.  
  61.  
  62.  
  63.  
  64.